This module defines a class to calculate the Euclidean distance between kohonen prototypes
Class to calculate the euclidean distance
| procedure, public :: calculate => calculate_euclidean_distance | 
Function to calculate euclidean distance between vectors
| Type | Intent | Optional | Attributes | Name | ||
|---|---|---|---|---|---|---|
| class(euclidean_distance) | :: | distance | 
 A   | 
        |||
| real(kind=wp), | intent(inout), | dimension(:,:) | :: | vector1 | 
 A real vector  | 
        |
| real(kind=wp), | intent(inout), | dimension(:,:) | :: | vector2 | 
 A real vector  | 
        
A real variable with the distance